home *** CD-ROM | disk | FTP | other *** search
/ CD Loisirs 6 / CDL_N6.iso / mac / CD Loisirs N°6 / PaperPlanes / Demo / 00055.ls < prev    next >
Encoding:
Text File  |  1994-08-25  |  302 b   |  13 lines
  1. on exitFrame
  2.   global Plane, Step
  3.   if Step < 10 then
  4.     set theFile to "STEP0"
  5.   else
  6.     set theFile to "STEP"
  7.   end if
  8.   set theFolder to "P" & string(Plane) & ":Audio:"
  9.   set theStep to theFile & string(Step) & ".AIF"
  10.   startAnnotTimer()
  11.   sound playFile 1, the pathName & theFolder & theStep
  12. end
  13.